
********************************************************************************
**#	FIGURE IA-1: Regression Discontinuity Plot of Compensation Committee Tenure
********************************************************************************

*Set file path
capture cd "C:\Users\austin.starkweather\Dropbox\Research\CD&A Disclosure\Analysis"
capture cd "C:\Users\joshw\Dropbox\CD&A Disclosure\Analysis"
use "Data\Temp\cda_n426_final.dta", clear

*RD Plot
rdplot comp_committee_tenure_ave sop_for_iss, ci(95) shade h(0.025 0.025) c(0.7) p(1) q(2) play(rd_graph) graph_options(legend(off) graphregion(color(white)))
	graph export "Output\Final\rd_plot_cc_tenure.png", as(png) replace
